﻿Class MainWindow
  Private Sub Calendar1_SelectedDatesChanged(
      ByVal sender As System.Object,
      ByVal e As System.Windows.Controls.SelectionChangedEventArgs) _
      Handles Calendar1.SelectedDatesChanged
    Me.TextBlock1.Text =
      "Selezionato " &
      Me.Calendar1.SelectedDates.First & "-" &
      Me.Calendar1.SelectedDates.Last
  End Sub
End Class
